﻿Imports Datos
Imports Entidad

Public Class MensajeNegocio

    Dim dao As New MensajeDatos

    Sub registrarMensaje(men As Mensaje)
        dao.registrarMensaje(men)
    End Sub

    Function verificarExistencia(men As Mensaje) As Boolean
        Return dao.verificarExistencia(men)
    End Function

    Sub actualizarMensaje(men As Mensaje)
        dao.actualizarMensaje(men)
    End Sub

End Class
